perm filename IN6[P11,LCS] blob sn#341672 filedate 1978-03-11 generic text, type T, neo UTF8
PRECEDE;
SRT←12800;
INS 0 1;<   INSTRUMENT 1
OSC P4 P8 B4 F1 P30;
MLT P5 P6 B3;
OSC B3 P8 B3 F2 P29;<RAMP 
MLT P7 P6 B5;<P7 IS BASIC M.I., P5 = AMOUNT TO BE ADDED.
AD2 B3 B5 B3;
OSC B3 P6 B3 F3 P28;<MODULATOR, P6 CONVTS AS FREQ.(MOD. FREQ.)
AD2 P3 B3 B3;<ADD IN CENTER FREQ.
OSC B4 B3 B4 F3 P27;
OUT B4 B1;END;<         ALL PARAM NUMS ARE 2 LESS THAN IN BOOK!

GEN 0 1 1 .01 0 .99 25
.99 400  0 511;<GEN INPUT MUST ALWAYS START NEW LINE!
GEN 0 2 3 1 1;<F3 , 1 HARMONIC
GEN 0 1 2 0 0 1 511;<F2 PUTS LINE FROM 0 TO 1 IN 511 STEPS 
INSTRUMENTS;
WUVV 1 8 FREQ 3 6
END;
*
WUVV 0 1 2;P2  1;P4 2000; 
P6 200 ;P5 NUM/20/10;P7 NUM/0/10;
P3 NOTES/C2/A1;END;